home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 10 / AACD 10.iso / AACD / Online / SpeakFreely / src / gsm / tls / bitter.c next >
C/C++ Source or Header  |  2000-05-18  |  1KB  |  67 lines
  1. /*
  2.  * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische
  3.  * Universitaet Berlin.  See the accompanying file "COPYRIGHT" for
  4.  * details.  THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE.
  5.  */
  6.  
  7. /*$Header: /home/kbs/jutta/src/gsm/gsm-1.0/tls/RCS/bitter.c,v 1.1 1992/10/28 00:28:39 jutta Exp $*/
  8.  
  9. /* Generate code to pack a bit array from a name:#bits description */
  10.  
  11. #include    <stdio.h>
  12. #include    "taste.h"
  13. #include    "proto.h"
  14.  
  15. void write_code P2((s_spex, n_spex), struct spex * s_spex, int n_spex)
  16. {
  17.     struct spex    * sp = s_spex;
  18.     int        bits = 8;
  19.     int        vars;
  20.  
  21.     if (!n_spex) return;
  22.  
  23.     vars = sp->varsize;
  24.  
  25.     while (n_spex) {
  26.  
  27.         if (bits == 8) printf("\t*c++ =   ");
  28.         else printf("\t       | ");
  29.  
  30.         if (vars == bits) {
  31.     
  32.             printf( (bits==8? "%s & 0x%lX;\n" : "(%s & 0x%lX);\n"),
  33.                 sp->var, 
  34.                 ~(0xfffffffe << (bits - 1)));
  35.             if (!-- n_spex) break;
  36.             sp++;
  37.  
  38.             vars = sp->varsize;
  39.             bits = 8;
  40.  
  41.         } else if (vars < bits) {
  42.  
  43.             printf( "((%s & 0x%lX) << %d)",
  44.                 sp->var,
  45.                 ~(0xfffffffe << (vars - 1)),
  46.                 bits - vars);
  47.             bits -= vars;
  48.             if (!--n_spex) {
  49.                 puts(";");
  50.                 break;
  51.             }
  52.             else putchar('\n');
  53.             sp++;
  54.             vars = sp->varsize;
  55.  
  56.         } else {
  57.             printf("((%s >> %d) & 0x%X);\n",
  58.                 sp->var, 
  59.                 vars - bits,
  60.                 ~(0xfffffffe << (bits - 1)));
  61.             
  62.             vars -= bits;
  63.             bits = 8;
  64.         }
  65.     }
  66. }
  67.